﻿Imports LRS.DTO
Imports LRS.BLL

Public Class ProductInfo
    Public Sub DisplayInfo(ByVal product As eProduct)
        lblProductID.Text = product.ProductID
        lblName.Text = product.ProductName
        lblRAM.Text = product.RAM
        lblCPU.Text = product.CPU
        lblHDD.Text = product.HDD
        lblGraphics.Text = product.Graphics
        lblScreen.Text = product.Screen
        lblRentingPrice.Text = product.RentingPrice
        lblManufacturer.Text = bManufacturer.GetManufacturerByID(product.ManufacturerID).ManufacturerName
        lblSupplier.Text = bSupplier.GetSupplierByID(product.SupplierID).SupplierName
        lblMoreInfo.Text = product.OtherInfo
        lblQuantity.Text = product.Quantity
    End Sub

End Class
